home *** CD-ROM | disk | FTP | other *** search
/ Shock - The Game / Shock The Game.iso / pc / shock.dxr / 00130_return from bjk.ls < prev    next >
Encoding:
Text File  |  1997-04-09  |  562 b   |  23 lines
  1. global GvidSprite, GscreenObject, GpicSprite
  2.  
  3. on mouseUp
  4.   repeat with x = 6 to 15
  5.     set the locH of sprite x to -5000
  6.   end repeat
  7.   repeat with x = 24 to 28
  8.     set the locH of sprite x to -5000
  9.   end repeat
  10.   puppetSprite(GpicSprite, 1)
  11.   set the member of sprite GpicSprite to member "bjBak" of castLib "art"
  12.   set the loc of sprite GpicSprite to point(320, 242)
  13.   puppetTransition(5)
  14.   updateStage()
  15.   repeat with x = 6 to 15
  16.     puppetSprite(x, 0)
  17.   end repeat
  18.   repeat with x = 24 to 28
  19.     puppetSprite(x, 0)
  20.   end repeat
  21.   returnNav(#n29n, 10040)
  22. end
  23.